home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / demos / az / cyberx.dxr / 00085_BOTON VIDEO DEFI.ls < prev    next >
Encoding:
Text File  |  1996-10-06  |  296 b   |  16 lines
  1. on mouseUp
  2.   global cinta, video, full_video, EnVideo
  3.   if cinta = 1 then
  4.     set EnVideo to 1
  5.     cursor(-1)
  6.     set cinta to 2
  7.     set the visible of sprite 34 to 0
  8.     set video to 1
  9.     if full_video = 1 then
  10.       go("video completo")
  11.     else
  12.       go("video defi")
  13.     end if
  14.   end if
  15. end
  16.